0 POKE53272,29
10 A=1
20 FORI=0TO2
30 FORX=0TO2
40 POKE1024+X*40+I,A*9+Q:Q=Q+1
50 NEXTX
60 NEXTI